home *** CD-ROM | disk | FTP | other *** search
/ Magnum One / Magnum One (Mid-American Digital) (Disc Manufacturing).iso / d12 / asmbler.arc / IDISK.ASM < prev    next >
Assembly Source File  |  1988-11-19  |  671b  |  33 lines
  1.                 ORG     0100H
  2. code        SEGMENT    PUBLIC 'code'
  3.         ASSUME    CS:code
  4.  
  5.                 PUSH    DS
  6.                 XOR    AX,AX
  7.                 PUSH    AX
  8.                 CALL    IDISK
  9.                 RET     FAR
  10. ;
  11. ; IDISK (drive)
  12. ;    int drive; /* 80h = c: 81h = d:
  13. ;
  14. SECTOR        DB    512 DUP (6CH)
  15.  
  16. IDISK        PROC    NEAR
  17.         PUSH    CS
  18.         POP    ES
  19.         MOV    BX,OFFSET SECTOR        ;Adr of sector buf
  20.         MOV    AL,6                ;INTERLEAVE = 6
  21.         MOV    AH,0                ;RESET
  22.         MOV    CX,1                ;CYL = 0, SECTOR = 1
  23.         MOV    DX,080H             ;Drive #
  24.         INT    13H                ;RESET DISK
  25.         MOV    AX,0F01H            ;LOAD BUFFER
  26.         INT    13H
  27.         MOV    AX,701H                ;FORMAT
  28.         INT    13H
  29.         RET                    ;RETURN TO DOS
  30. IDISK        ENDP
  31. code        ENDS
  32.         END
  33.